﻿Imports Global_Visas_Business_Layer
Partial Public Class frmReportCriteria

    Private Sub txtDateFrom_SelectedDateChanged(ByVal sender As Object, ByVal e As System.Windows.Controls.SelectionChangedEventArgs) Handles txtDateFrom.SelectedDateChanged
        Me.txtDateFrom.Text = (New CommonFuncs).FormatDate(txtDateFrom.SelectedDate)
    End Sub

    Private Sub txtDateTo_SelectedDateChanged(ByVal sender As Object, ByVal e As System.Windows.Controls.SelectionChangedEventArgs) Handles txtDateTo.SelectedDateChanged
        Me.txtDateTo.Text = (New CommonFuncs).FormatDate(txtDateTo.SelectedDate)
    End Sub

    Private Sub frmReportCriteria_Loaded(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs) Handles Me.Loaded
        GeneralTasks.ChangeTheme(Me)
        GeneralTasks.EnumerateandFill(Me.LogicalChildren)
    End Sub
End Class
